unit uQiNiuNew;

{$mode ObjFPC}{$H+}

interface

uses
  Classes, SysUtils, Forms, Controls, Graphics, Dialogs, StdCtrls, ExtCtrls,
  Spin;

type

  { TFmQiNiuEdit }

  TFmQiNiuEdit = class(TForm)
    BtnQiNiuTestConnect: TButton;
    BTOK: TButton;
    EDSpaceName: TEdit;
    EDSecretKey: TEdit;
    EDName: TEdit;
    EDAccessKey: TEdit;
    Label3: TLabel;
    lbAccessKey: TLabel;
    LBIP: TLabel;
    LBIP1: TLabel;
    Panel1: TPanel;
    procedure BtnQiNiuTestConnectClick(Sender: TObject);
    procedure BTOKClick(Sender: TObject);
    procedure Button1Click(Sender: TObject);
    procedure FormClick(Sender: TObject);
  private

  public

  end;

var
  FmQiNiuEdit: TFmQiNiuEdit;

implementation

{$R *.lfm}

{ TFmQiNiuEdit }

procedure TFmQiNiuEdit.BTOKClick(Sender: TObject);
begin

end;

procedure TFmQiNiuEdit.BtnQiNiuTestConnectClick(Sender: TObject);
begin

end;

procedure TFmQiNiuEdit.Button1Click(Sender: TObject);
begin

end;

procedure TFmQiNiuEdit.FormClick(Sender: TObject);
begin

end;

end.

